package lib.android.timingbar.com.http.cookie;

import android.content.Context;
import android.content.SharedPreferences;
import android.text.TextUtils;
import lib.android.timingbar.com.http.util.HttpLog;
import okhttp3.Cookie;
import okhttp3.HttpUrl;

import java.io.*;
import java.util.*;
import java.util.concurrent.ConcurrentHashMap;

/**
 * PersistentCookieStore
 * -----------------------------------------------------------------------------------------------------------------------------------
 * <p>描述：cookie存储器</p>
 *
 * @author rqmei on 2018/9/7
 */

public class PersistentCookieStore {
    private static final String COOKIE_PREFS = "Cookies_Prefs";

    private final Map<String, ConcurrentHashMap<String, Cookie>> cookies;
    private final SharedPreferences cookiePrefs;


    public PersistentCookieStore(Context context) {
        cookiePrefs = context.getSharedPreferences (COOKIE_PREFS, 0);
        cookies = new HashMap<> ();
        Map<String, ?> prefsMap = cookiePrefs.getAll ();
        for (Map.Entry<String, ?> entry : prefsMap.entrySet ()) {
            String[] cookieNames = TextUtils.split ((String) entry.getValue (), ",");
            for (String name : cookieNames) {
                String encodedCookie = cookiePrefs.getString (name, null);
                if (encodedCookie != null) {
                    Cookie decodedCookie = decodeCookie (encodedCookie);
                    if (decodedCookie != null) {
                        if (!cookies.containsKey (entry.getKey ())) {
                            cookies.put (entry.getKey (), new ConcurrentHashMap<String, Cookie> ());
                        }
                        cookies.get (entry.getKey ()).put (name, decodedCookie);
                    }
                }
            }
        }
    }

    protected String getCookieToken(Cookie cookie) {
        return cookie.name () + "@" + cookie.domain ();
    }


    public void add(HttpUrl url, Cookie cookie) {
        String name = getCookieToken (cookie);
        // 添加 host key. 否则有可能抛空.
        if (!cookies.containsKey (url.host ())) {
            cookies.put (url.host (), new ConcurrentHashMap<String, Cookie> ());
        }
        // 删除已经有的.
        if (cookies.containsKey (url.host ())) {
            cookies.get (url.host ()).remove (name);
        }
        // 添加新的进去
        cookies.get (url.host ()).put (name, cookie);
        // 是否保存到 SP 中
        if (cookie.persistent ()) {
            SharedPreferences.Editor prefsWriter = cookiePrefs.edit ();
            prefsWriter.putString (url.host (), TextUtils.join (",", cookies.get (url.host ()).keySet ()));
            prefsWriter.putString (name, encodeCookie (new SerializableOkHttpCookies (cookie)));
            prefsWriter.apply ();
        } else {
            SharedPreferences.Editor prefsWriter = cookiePrefs.edit ();
            prefsWriter.remove (url.host ());
            prefsWriter.remove (name);
            prefsWriter.apply ();
        }
    }

    public void addCookies(List<Cookie> cookies) {
        for (Cookie cookie : cookies) {
            String domain = cookie.domain ();
            ConcurrentHashMap<String, Cookie> domainCookies = this.cookies.get (domain);
            if (domainCookies == null) {
                domainCookies = new ConcurrentHashMap<> ();
                this.cookies.put (domain, domainCookies);
            }
            cookies.add (cookie);
        }
    }

    public List<Cookie> get(HttpUrl url) {
        ArrayList<Cookie> ret = new ArrayList<> ();
        if (cookies.containsKey (url.host ()))
            ret.addAll (cookies.get (url.host ()).values ());
        return ret;
    }

    public boolean removeAll() {
        SharedPreferences.Editor prefsWriter = cookiePrefs.edit ();
        prefsWriter.clear ();
        prefsWriter.apply ();
        cookies.clear ();
        return true;
    }

    public boolean remove(HttpUrl url, Cookie cookie) {
        String name = getCookieToken (cookie);

        if (cookies.containsKey (url.host ()) && cookies.get (url.host ()).containsKey (name)) {
            cookies.get (url.host ()).remove (name);

            SharedPreferences.Editor prefsWriter = cookiePrefs.edit ();
            if (cookiePrefs.contains (name)) {
                prefsWriter.remove (name);
            }
            prefsWriter.putString (url.host (), TextUtils.join (",", cookies.get (url.host ()).keySet ()));
            prefsWriter.apply ();

            return true;
        } else {
            return false;
        }
    }

    public List<Cookie> getCookies() {
        ArrayList<Cookie> ret = new ArrayList<> ();
        for (String key : cookies.keySet ())
            ret.addAll (cookies.get (key).values ());

        return ret;
    }

    /**
     * cookies to string
     */
    protected String encodeCookie(SerializableOkHttpCookies cookie) {
        if (cookie == null)
            return null;
        ByteArrayOutputStream os = new ByteArrayOutputStream ();
        try {
            ObjectOutputStream outputStream = new ObjectOutputStream (os);
            outputStream.writeObject (cookie);
        } catch (IOException e) {
            HttpLog.d ("IOException in encodeCookie" + e.getMessage ());
            return null;
        }

        return byteArrayToHexString (os.toByteArray ());
    }

    /**
     * String to cookies
     */
    protected Cookie decodeCookie(String cookieString) {
        byte[] bytes = hexStringToByteArray (cookieString);
        ByteArrayInputStream byteArrayInputStream = new ByteArrayInputStream (bytes);
        Cookie cookie = null;
        try {
            ObjectInputStream objectInputStream = new ObjectInputStream (byteArrayInputStream);
            cookie = ((SerializableOkHttpCookies) objectInputStream.readObject ()).getCookies ();
        } catch (IOException e) {
            HttpLog.d ("IOException in decodeCookie" + e.getMessage ());
        } catch (ClassNotFoundException e) {
            HttpLog.d ("ClassNotFoundException in decodeCookie" + e.getMessage ());
        }

        return cookie;
    }

    /**
     * byteArrayToHexString
     */
    protected String byteArrayToHexString(byte[] bytes) {
        StringBuilder sb = new StringBuilder (bytes.length * 2);
        for (byte element : bytes) {
            int v = element & 0xff;
            if (v < 16) {
                sb.append ('0');
            }
            sb.append (Integer.toHexString (v));
        }
        return sb.toString ().toUpperCase (Locale.US);
    }

    /**
     * hexStringToByteArray
     */
    protected byte[] hexStringToByteArray(String hexString) {
        int len = hexString.length ();
        byte[] data = new byte[len / 2];
        for (int i = 0; i < len; i += 2) {
            data[i / 2] = (byte) ((Character.digit (hexString.charAt (i), 16) << 4) + Character.digit (hexString.charAt (i + 1), 16));
        }
        return data;
    }
}
